/*
	cancella le polizze e le prenotazioni riferite a un caricatore
*/

declare @codpren char(14)
declare @codpolizza int
declare @codcaricatore varchar(6)='M00001'
declare @quanti int

set @quanti=(select count(codpren) from p_polizze where CODCARICATORE=@codcaricatore)

while (@quanti>0)
begin
select @codpren = p.CODPREN, @codpolizza = p.IDPOLIZZA from p_polizze p where p.CODCARICATORE = @codcaricatore

--select @codpren codpren, @codpolizza codpolizza

delete from p_polizze_pax where IDPOLIZZA = @codpolizza
delete from p_polizze_sis where IDPOLIZZA = @codpolizza
delete from p_polizze_veicoli where IDPOLIZZA = @codpolizza
delete from p_polizze_accessori where IDPOLIZZA = @codpolizza
delete from p_polizze where IDPOLIZZA = @codpolizza

delete from p_polizze_pax_arch where IDPOLIZZA = @codpolizza
delete from p_polizze_sis_arch where IDPOLIZZA = @codpolizza
delete from p_polizze_veicoli_arch where IDPOLIZZA = @codpolizza
delete from p_polizze_accessori_arch where IDPOLIZZA = @codpolizza
delete from p_polizze_arch where IDPOLIZZA = @codpolizza


delete from dettax where codpren = @codpren
delete from biglietti where codpren = @codpren
delete from movimenti where codpren = @codpren
delete from commissioni_dett where CODPREN=@codpren
delete from passeg where codpren = @codpren
delete from detbig where codpren = @codpren
delete from entbig where codpren = @codpren
delete from seqbig where codpren = @codpren
delete from biglie where codpren = @codpren


delete from dettax_arch where codpren = @codpren
delete from passeg_arch where codpren = @codpren
delete from detbig_arch where codpren = @codpren
delete from entbig_arch where codpren = @codpren
delete from seqbig_arch where codpren = @codpren
delete from biglie_arch where codpren = @codpren

set @quanti=@quanti-1
end